From a4da9248eddf61dc7490de536bc4321426aeac8b Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Wed, 27 Feb 2008 16:38:37 +0000 Subject: [PATCH] *** empty log message *** --- lisp/uniquify.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/uniquify.el b/lisp/uniquify.el index c07dd57af4e..4d4f755aa6a 100644 --- a/lisp/uniquify.el +++ b/lisp/uniquify.el @@ -192,7 +192,8 @@ It actually holds the list of `uniquify-item's corresponding to the conflict.") ;; Used in desktop.el to save the non-uniquified buffer name (defun uniquify-buffer-base-name () "Return the base name of the current buffer. -Return nil if the buffer is not managed by uniquify." +Return nil if the buffer is not managed by uniquify, +or if the base name is empty." (and uniquify-managed (let ((base (uniquify-item-base (car uniquify-managed)))) (if (string= base "") nil base)))) -- 2.30.2